home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
351-375
/
disk_353
/
aztecarp
/
wbparse.c
< prev
Wrap
C/C++ Source or Header
|
1992-05-06
|
1KB
|
57 lines
/* Copyright (C) 1986,1987 by Manx Software Systems, Inc. */
/*
* This routine is called from the _main() routine and is used to
* open a window for standard I/O to use. The window is actually
* defined by setting the ToolType, "WINDOW", to the desired window
* specification. If this is not required, this routine may be
* replaced by a stub in the users main program. Note that even if
* this code is called by _main(), if the WINDOW tool type is not
* defined, there will be no window.
*
* EXAMPLE: WINDOW=CON:0/0/640/200/Test Window
*/
/* tweeked to handle v1.4 wbench startup */
void *IconBase;
_wb_parse(struct Process *pp,struct WBStartup *wbm)
{
char *cp;
struct DiskObject *dop;
struct FileHandle *fhp;
BPTR wind;
if (IconBase = OpenLibrary("icon.library", 0L))
{
if (dop = GetDiskObject(wbm->sm_ArgList->wa_Name))
{
if (cp = FindToolType(dop->do_ToolTypes, "WINDOW"))
{
if (wind = Open(cp, MODE_OLDFILE))
{
fhp = (struct FileHandle *) (wind << 2);
pp->pr_ConsoleTask = (APTR) fhp->fh_Type;
pp->pr_CIS = (BPTR)wind;
pp->pr_COS = (BPTR)Open("*", MODE_OLDFILE);
/* !!! 1.4 tweek */
_devtab[0].mode &= ~O_STDIO; /* setup for exit to close these if we succeeded */
_devtab[1].mode &= ~O_STDIO;
/* !!! 1.4 tweek */
}
}
FreeDiskObject(dop);
}
CloseLibrary(IconBase);
IconBase = 0;
}
}